home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
051-075
/
disk_053
/
compiler
/
test.s
< prev
Wrap
Text File
|
1992-05-06
|
331b
|
27 lines
text
main:
link %a6,&-4
movm.l &0x1000,-(%a7)
mov &0,%d3
mov.l %d3,-(%a7)
jsr subr
add.w &4,%a7
L%0:
movm.l (%a7)+,&0x0008
unlk %a6
rts
subr:
link %a6,&0
movm.l &0x1000,-(%a7)
mov.l 8(%a6),%d3
mov &2,%d0
muls %d3,%d0
mov.l %d0,%d3
mov.l %d3,%d0
L%1:
movm.l (%a7)+,&0x0008
unlk %a6
rts
global main
global subr